﻿Imports System.ComponentModel

Public Class TeamServer
    Implements INotifyPropertyChanged



    Private m_Name As String
    Private m_Host As String
    Private m_Protocal As String
    Private m_Port As Integer

    Public Property Name() As String
        Get
            Return m_Name
        End Get
        Set(ByVal value As String)
            If Not m_Name = value Then
                m_Name = value
                OnPropertyChanged("Name")
            End If
        End Set
    End Property

    Public Property Host() As String
        Get
            Return m_Host
        End Get
        Set(ByVal value As String)
            If Not m_Host = value Then
                m_Host = value
                OnPropertyChanged("Host")
            End If
        End Set
    End Property

    Public Property Protocal() As String
        Get
            Return m_Protocal
        End Get
        Set(ByVal value As String)
            If Not m_Protocal = value Then
                m_Protocal = value
                OnPropertyChanged("Protocal")
            End If
        End Set
    End Property

    Public Property Port() As Integer
        Get
            Return m_Port
        End Get
        Set(ByVal value As Integer)
            If Not m_Port = value Then
                m_Port = value
                OnPropertyChanged("Port")
            End If
        End Set
    End Property

    Public Event PropertyChanged(ByVal sender As Object, ByVal e As System.ComponentModel.PropertyChangedEventArgs) Implements System.ComponentModel.INotifyPropertyChanged.PropertyChanged

    Private Sub OnPropertyChanged(ByVal propertyName As String)
        RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propertyName))
    End Sub

End Class
